Imports System.Data

Partial Class past_news
    Inherits System.Web.UI.Page

    Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        If Not Page.IsPostBack Then
            If Not Request.UrlReferrer Is Nothing Then
                lnkBack.NavigateUrl = Request.UrlReferrer.AbsoluteUri
            Else
                lnkBack.NavigateUrl = Request.RawUrl
            End If

            If Not Request.QueryString("id") Is Nothing Then
                Newslist1.Visible = False
                lnkBack.Visible = True
            Else
                lnkBack.Visible = False
            End If
        End If

        Dim lblCustomTitle As Label = Me.Master.FindControl("lblCustomTitle")
        lblCustomTitle.Text = "Past News Articles"
    End Sub

End Class
